object FormAbreCaixa: TFormAbreCaixa
  Left = 319
  Top = 279
  BorderIcons = []
  BorderStyle = bsNone
  Caption = 'FormAbreCaixa'
  ClientHeight = 246
  ClientWidth = 686
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel1: TBevel
    Left = 8
    Top = 8
    Width = 673
    Height = 233
  end
  object LabelData: TLabel
    Left = 24
    Top = 25
    Width = 321
    Height = 16
    AutoSize = False
    Caption = 'Data do Caixa:'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clMaroon
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label4: TLabel
    Left = 169
    Top = 161
    Width = 45
    Height = 16
    Alignment = taRightJustify
    Caption = 'Total :'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Shape1: TShape
    Left = 224
    Top = 152
    Width = 121
    Height = 25
  end
  object DBTextTotal: TDBText
    Left = 278
    Top = 157
    Width = 65
    Height = 17
    Alignment = taRightJustify
    Color = clWhite
    DataField = 'soma'
    DataSource = DataSource1
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clMaroon
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
  end
  object BitBtnOK: TBitBtn
    Left = 216
    Top = 208
    Width = 75
    Height = 25
    TabOrder = 0
    OnClick = BitBtnOKClick
    Kind = bkOK
  end
  object BitBtn2: TBitBtn
    Left = 336
    Top = 208
    Width = 75
    Height = 25
    TabOrder = 1
    Kind = bkCancel
  end
  object DBGridPagamento: TDBGrid
    Left = 24
    Top = 48
    Width = 320
    Height = 89
    DataSource = DataSource1
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnKeyDown = DBGridPagamentoKeyDown
    OnKeyPress = DBGridPagamentoKeyPress
    Columns = <
      item
        Expanded = False
        FieldName = 'Pagamento'
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -13
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = []
        Width = 137
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'valor'
        Title.Caption = 'Valor'
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -13
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = []
        Width = 141
        Visible = True
      end>
  end
  object cdsPagamento: TClientDataSet
    Aggregates = <>
    AggregatesActive = True
    Params = <>
    Left = 368
    Top = 80
    object cdsPagamentoid_tp_pagamento: TIntegerField
      FieldName = 'id_tp_pagamento'
    end
    object cdsPagamentoPagamento: TStringField
      FieldName = 'Pagamento'
      Size = 50
    end
    object cdsPagamentovalor: TFloatField
      FieldName = 'valor'
      OnGetText = cdsPagamentovalorGetText
    end
    object cdsPagamentosoma: TAggregateField
      FieldName = 'soma'
      Active = True
      DisplayFormat = '#0.00'
      Expression = 'sum(valor)'
    end
  end
  object DataSource1: TDataSource
    DataSet = cdsPagamento
    Left = 400
    Top = 80
  end
  object QueryTpPagamento: TQuery
    DatabaseName = 'DBPizza'
    SQL.Strings = (
      
        'select * from tp_pagamento where ativo = 1 and id in (0,10) orde' +
        'r by nm')
    Left = 432
    Top = 80
    object QueryTpPagamentoid: TIntegerField
      FieldName = 'id'
      Origin = 'DBPIZZA.tp_pagamento.id'
    end
    object QueryTpPagamentonm: TStringField
      FieldName = 'nm'
      Origin = 'DBPIZZA.tp_pagamento.nm'
      Size = 45
    end
    object QueryTpPagamentonk: TStringField
      FieldName = 'nk'
      Origin = 'DBPIZZA.tp_pagamento.nk'
    end
    object QueryTpPagamentodt_cadastro: TDateField
      FieldName = 'dt_cadastro'
      Origin = 'DBPIZZA.tp_pagamento.dt_cadastro'
    end
    object QueryTpPagamentoativo: TIntegerField
      FieldName = 'ativo'
      Origin = 'DBPIZZA.tp_pagamento.ativo'
    end
    object QueryTpPagamentoid_recibo: TIntegerField
      FieldName = 'id_recibo'
      Origin = 'DBPIZZA.tp_pagamento.id_recibo'
    end
  end
  object QueryO_Entregador: TQuery
    DatabaseName = 'DBPizza'
    SQL.Strings = (
      'select * from o_entregador order by id')
    Left = 464
    Top = 152
  end
end
